home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / CrazyCreeps.dxr / 00010_Special Item.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  629 b   |  22 lines
  1. property pMySpriteNum, pObjectType
  2. global gPlayer
  3.  
  4. on getPropertyDescriptionList
  5.   return [#pObjectType: [#comment: "What type of object? : ", #format: #symbol, #range: [#freeMan, #bonusPoints], #default: #freeMan]]
  6. end
  7.  
  8. on beginSprite me
  9.   pMySpriteNum = the currentSpriteNum
  10.   sprite(pMySpriteNum).visible = 1
  11. end
  12.  
  13. on enterFrame me
  14.   if sprite(pMySpriteNum).visible then
  15.     if sprite pMySpriteNum intersects sprite(gPlayer.pMySpriteNum) then
  16.       gPlayer.handlePowerup(pObjectType)
  17.       sprite(pMySpriteNum).visible = 0
  18.       puppetSound(8, [#freeMan: "OneUp", #bonusPoints: "powerup"][pObjectType])
  19.     end if
  20.   end if
  21. end
  22.